home *** CD-ROM | disk | FTP | other *** search
- 100 REM" USER GUIDE & DEMO 19-JAN-89
- 110 N$[178]"OSMAN":T1$[178]" (null)(null)VAL(null)":T2$[178]" (null)(null)(null)(null)VAL(null)"
- 120 GP$[178]"HINT & TIPS PIC":ADR[178]160[172]256:L[178]6:[143]"6 HIRES LINES INTO EMPTY RAM
- 130 PRINT"[155][147] ***************
- 140 [153]" * USER GUIDE *
- 150 PRINT" * OPEN SYSTEM *
- 160 [153]" * KA43/5 *
- 170 PRINT" ***************[154]
- 180 SJ[178][194](776)[170]256[172][194](777)[171]22
- 190 [139] [194](SJ)[178]52 [175] [194](SJ[170]1)[178]51 [137]220
- 200 [153]"LOAD AND RUN OPEN SYSTEM KA43/5 WAIT"
- 210 [153]"AND THEN RELOAD AND RUN THIS PROGRAM":[128]
- 220 [133]"WANT NORWEGIAN CHRACTERSET Y/N YCMDCMDCMD";CH$
- 230 [139] CH$[179][177]"Y" [137]250
- 240 _X"NORSK":[143]" MAY INTEFERE WITH MOST BASIC EXTENSIONS
- 250 PRINT CHR$(14):PRINT"[147]";SPC(11);"[155][213][211][197][210] [199][213][201][196][197] [203][193]43/5
- 260 [153] [166]18);"BY
- 270 PRINT SPC(13);"[203]]RE [193]ANESTAD[154]
- 280 [153]"(null)URN YOUR VALPSON COMPATIBLE PRINTER ON !
- 290 PRINT"[201]S YOUR PRINTER SET FOR
- 300 [133]"(null)WAITET-ATN(null)LENRIGHT$RIGHT$ OR (null)WAITTANDARD ATN(null)LENRIGHT$RIGHT$ (null)CMDCMDCMD";PR$
- 310 [153]"ATNLIGNE PAPER TO TOP OF PAGE!
- 320 INPUT"[217] TO CONTINUE OR [206] TO STOP [217][157][157][157]";CO$
- 330 IF CO$<>"[217]" THEN END
- 340 GOSUB460:_G27,ADR/256,L:REM" LOADING HIRES
- 350 _B1 T1$
- 360 [159] 4,4:[152]4:[152]4:[160] 4:[143] "LINE SPACING
- 370 _B1 T2$:_C0,76:IF PR$<>"[208]" AND PR$<>"P" GOTO390
- 380 _C0,76+128:REM" PET-ASCII EG. MPS 1200
- 390 [153]"(null)EALIGN PAPER TO TOP OF PAGE!"
- 400 [153]"(null)(null)VAL(null)(null) ATN (null)VAL(null)WAIT TO CONTINUE.":[153]:[129] X[178]1 [164] 200:[130]
- 410 [139] [194](197)[178]64 [137]410
- 420 [153] [166]43);"(null)RESS ASC7 WAIT (null)(null) (null)(null)(null)(null) (null)(null)RIGHT$(null)(null)RIGHT$(null)CHR$ !"
- 430 _X"FILE-READER","0:OSMAN",4,1:[143]"'0:' OPTION TO SPEED UP, SCREEN _X,3,1
- 440 PRINT:_E:PRINT" [198][201][206][201][212][207] !":END
- 450 :
- 460 REM" RELOCATED LOADING
- 470 [159] 1,8,0,GP$:[151]185,0
- 480 [151]780,0:[151]782,ADR[173]256:[151]781,ADR[171][194](782)[172]256:[158]65493
- 490 [139] ST[179][177]64 [167] [153]"ASCILE NOT FOUND!WAIT":[160] 1:[128]
- 500 [160] 1:[142]
-